home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Applications / Utilities / Remotes / Source / GNULicense.m < prev    next >
Encoding:
Text File  |  1992-09-23  |  3.1 KB  |  91 lines
  1. // Copyright (C) 1989 Jacob Gore
  2. // 
  3. // This file is part of GNULicense, a package to ease the inclusion
  4. // of the GNU General Public License into NextStep applications.
  5. // 
  6. //     This program is free software; you can redistribute it and/or modify
  7. //     it under the terms of the GNU General Public License as published by
  8. //     the Free Software Foundation; either version 1, or (at your option)
  9. //     any later version.
  10. // 
  11. //     This program is distributed in the hope that it will be useful,
  12. //     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. //     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. //     GNU General Public License for more details.
  15. // 
  16. //     You should have received a copy of the GNU General Public License
  17. //     along with this program; if not, write to the Free Software
  18. //     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA
  19. //     or send electronic mail to Jacob Gore <jacob@gore.com>.
  20.  
  21. // The code to print the License leaves much to be desired.  I have left my
  22. // most successful attempts at providing the user with the printing interface
  23. // that is supposed to be the norm on the NeXT (put up a PrintPanel, etc.) in
  24. // this file, commented out.  If anybody can do it right, please send me the
  25. // code!
  26. //
  27. // Jacob Gore <jacob@gore.com>
  28. /*---------------------------------------------------------------------------
  29. April, 1990
  30. This source code has been locally modified.  The initial modifications are
  31. summarized below.  Future modifications will appear in the RCS log entries.
  32.  
  33. Source modifications
  34.   April 1, 1990 (Rex Pruess)
  35.     o Removed all code associated with printing.  Users can cut/paste if
  36.       they desire to print the license.
  37.     o Changed load to use "withNames:NO" for minor performance gain.
  38.     o Changed "panel" to "gnuPanel".
  39. ---------------------------------------------------------------------------
  40. Rex Pruess  <rpruess@umaxc.weeg.uiowa.edu>
  41.  
  42. $Header: /rpruess/apps/Remotes3.0/RCS/GNULicense.m,v 3.0 92/09/23 22:15:04 rpruess Exp $
  43. -----------------------------------------------------------------------------
  44. $Log:    GNULicense.m,v $
  45. Revision 3.0  92/09/23  22:15:04  rpruess
  46. Checked in to RCS to get the revision number updated to 3.0.
  47.  
  48. Revision 2.1  92/09/23  21:29:50  rpruess
  49. Updated code for NeXT System Release 3.0.
  50.  
  51. Revision 2.0  91/01/22  15:32:39  rpruess
  52. Remotes-2.0 was upgraded for NeXT System Release 2.0 (standard or extended).
  53. Remotes-2.0 supports the NeXT supplied Terminal application and the Stuart
  54. shareware product.
  55.  
  56. Revision 1.1  90/04/10  14:20:32  rpruess
  57. Initial revision
  58.  
  59. -----------------------------------------------------------------------------*/
  60.  
  61. /* GNULicense class header file */
  62. #import "GNULicense.h"
  63.  
  64. /* Appkit header files */
  65. #import <appkit/Application.h>
  66. #import <appkit/Panel.h>
  67.  
  68. @implementation GNULicense
  69.  
  70. - init
  71. {
  72.     self = [super init];
  73.     [NXApp loadNibSection:"GNULicense.nib" owner:self withNames:NO];
  74.     [gnuPanel setMiniwindowIcon:"app"];
  75.     return self;
  76. }
  77.  
  78. - showLicense:sender
  79. {
  80.     [gnuPanel makeKeyAndOrderFront:self];
  81.     return self;
  82. }
  83.  
  84. - setGnuPanel:anObject
  85. {
  86.     gnuPanel = anObject;
  87.     return self;
  88. }
  89.  
  90. @end
  91.